home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / UTIL / MEMORY / OLD / MEM208SRC / FSLib / c / _Close < prev    next >
Text File  |  1993-08-22  |  440b  |  18 lines
  1. /* Original code (c) Acorn Computers Ltd, 1992-3 */
  2.  
  3. /* $Id: c._Close 3.1 93/03/09 23:04:37 brian Exp $ */
  4.  
  5. #include "FS.h"
  6.  
  7. _kernel_oserror *fsentry_close( FSEntry_Close_Parameter *parm )
  8. {
  9.   FileEntry *fse=(FileEntry *)parm->handle;
  10. #ifdef DEBUG
  11.   printf("Close(%lx)\n",parm->handle);
  12. #endif
  13.   if (parm->info.date_type.part_1 || parm->info.date_type.part_2)
  14.     FileEntry_SetInfo(fse,parm->info);
  15.   FileEntry_Close(fse);
  16.   return NULL;
  17. }
  18.